CD-ROM Magazine 28 Bonus/CDRomMagazine-SoftKey-ArtPassion-FrenchVersion-Win31Mac.bin/data/artmain.dir/00093_Script_Mac & Win QTVR Handlers

Text File | 1996-06-05 | 924b | 52 lines

on WinMachine
  return (the machineType = 256)
end

on InitQTVR
  if WinMachine() then
    InitQTVRWin
  else
    InitQTVRMac
  end if
end

on disposeQTVR
  if WinMachine() then
    DisposeQTVRWin
  else
    DisposeQTVRMac
  end if
end

on SetPanoNode pNodeID, pUpdate, pQuality
  if WinMachine() then
    SetPanoNodeWin pNodeID, pUpdate, pQuality
  else
    SetPanoNodeMac pNodeID, pUpdate, pQuality
  end if
end

on PanoFrameScript pSpriteNum
  if WinMachine() then
    PanoFrameScriptWin pSpriteNum
  else
    PanoFrameScriptMac pSpriteNum
  end if
end

on openPanoMovie pFileName, pSpriteNum, pShowOnOpen
  if WinMachine() then
    OpenPanoMovieWin pFileName, pSpriteNum, pShowOnOpen
  else
    OpenPanoMovieMac pFileName, pSpriteNum, pShowOnOpen
  end if
end

on closePanoMovie
  if WinMachine() then
    ClosePanoMovieWin
  else
    ClosePanoMovieMac
  end if
end